home *** CD-ROM | disk | FTP | other *** search
/ Chip 2004 April / CMCD0404.ISO / Software / Shareware / Multimedia / extrememov / extrememm2.6b3sharefull.exe / {app} / scripts / [STOPKLATKA.PL] - (Movie Info Import) @ ZbychoS 27_06_2002.txt < prev    next >
Encoding:
Text File  |  2003-03-18  |  23.5 KB  |  962 lines
  1. -----------------------------------------------
  2. -                 DivxManager                 -
  3. -            MagicScript Technology           -
  4. -          2002 Alessio "AleTsg" Viti         -
  5. -----------------------------------------------
  6. - Web :      STOPKLATKA.PL                    -
  7. - Autor :    Zbigniew [ZbychoS] Snarski       -
  8. - Date  :    27/06/2002                       -
  9. - Comments : Import Information if available  -
  10. -----------------------------------------------
  11.  
  12.  
  13. #MADEBY#=Brzydal (ZbychoS)
  14. #DATEBUILD#=20/06/2002
  15. #WEBSITE#=STOPKLATKA.PL
  16. #NOTE#=Import Additional Info Only / Bug upgraded by Cof 18/03/2003
  17. #SCRIPTQUALITY#=2
  18.  
  19.  
  20. zmienna 50 - oryginal title
  21. zmienna 49 - director
  22. zmienna 48 - actor
  23. zmienna 47 - genre (rodzaj)
  24. zmienna 46 - rating (ocena)
  25. zmienna 45 - comments
  26. zmienna 44 - plot
  27. zmienna 43 - runtime
  28. zmienna 42 - year
  29. zmienna 41 - country
  30. zmienna 40 - movie site id
  31. zmienna 39 - language
  32. zmienna 38 - web link
  33. zmienna 37 - producer
  34. zmienna 36 - writer
  35. zmienna 35 - music
  36. zmienna 34 - region
  37. zmienna 33 - edition
  38. zmienna 32 - screen DVD
  39. zmienna 31 - audio DVD
  40. zmienna 30 - tag line
  41. zmienna 29 - photographer
  42. zmienna 28 - studio
  43. zmienna 27 - MPAA
  44. zmienna 26 - distributor
  45. zmienna 25 - official web
  46.  
  47. zmienna 04 - end string
  48. zmienna 03 - start string
  49. zmienna 02 - const. = 0
  50. zmienna 01 - szukanie = 0/1
  51.  
  52.  
  53.  
  54. #WEBQUERY#=http://www.stopklatka.pl/szukaj/szukaj.asp?szukaj=#MOVIE#&kategoria=film
  55.  
  56.  
  57.  
  58.  
  59. -------------------------------------------------------------------------------------------------------------------
  60. #RIGHTPAGEFOUND#
  61.     #PUT#=0#12#
  62.     #PUT#=0#02#
  63.     #STARTREADWEB#
  64.     #FINDLINE#=<ul><li>#01##ONERROR#=*STOP*
  65.     #FIND#=fi=#03# #ONERROR#=*STOP*
  66.     #FIND#==#03# #ONERROR#=*STOP*
  67.     #FIND#="#04# #ONERROR#=*STOP*
  68.     #TAKEWORD#=#40#,#03#,#04#
  69.     #FIND#=<li>#05# #ONERROR#=*OK*
  70.     #CONDITIONRIGHTPAGE# #05#==#02#
  71. #ENDRIGHTPAGEFOUND#
  72. -------------------------------------------------------------------------------------------------------------------
  73. #CREATEMOVIELIST#
  74.     #IF# #01#==#02#
  75.         #WRITETITLELIST#=
  76.         #WRITETITLELIST#=Eeeeeeee... NIC NIE ZNALEZIONO !!!
  77.         #WRITETITLELIST#=WPISZ POPRAWNY TYTUL FILMU (LUB JEGO CZESC)
  78.         #WRITETITLELIST#=I PON╙W SZUKANIE :)
  79.         #WRITETITLELIST#=POZA TYM STOPKLATKA TAK MA... :(
  80.         #PUT#=0#12#
  81.         #GOTO#=ENDOTHERMOVIE
  82.     #ENDIF#
  83.     #STARTREADWEB#
  84.     #PUT#=1#12#
  85.     #WRITETITLELIST#=---------------------
  86.     #WRITETITLELIST#=Znalezione tytu│y
  87.     #WRITETITLELIST#=---------------------
  88.     #WRITETITLELIST#=
  89.     #FINDLINE#=<li> <a href="/film/film#01##ONERROR#=*STOP*
  90.     #REPEAT#
  91.         #FIND#="#03# #ONERROR#=*STOP*
  92.         #FIND#=fi#01# #ONERROR#=*STOP*
  93.         #FIND#="#04# #ONERROR#=*STOP*
  94.         #TAKEWORD#=#05#,#03#,#04#
  95.         #FIND#=<b>#03# #ONERROR#=*STOP*
  96.         #FIND#= #04# #ONERROR#=*STOP*
  97.         #TAKEWORD#=#06#,#03#,#04#
  98.         #CHECKVARIABLE#=#06#
  99.         #STARTDELETETAGS#
  100.         #STARTSUBSTITUTETAGS#
  101.         #WRITETITLELIST#=http://www.stopklatka.pl#05#    ---> #06#
  102.         #FIND#=<li>#07# #ONERROR#=*OK*
  103.     #WHILE# #02#<>#07#
  104.  
  105. :ENDOTHERMOVIE
  106. #ENDCREATEMOVIELIST#
  107.  
  108.  
  109. -------------------------------------------------------------------------------------------------------------------
  110.  
  111. #MOVIETITLE#
  112.     #IF# #02#<>#12#
  113.         #FINDLINE#=/film/film.asp?fi=#01##ONERROR#=*STOP*
  114.         #FIND#=fi#03# #ONERROR#=*STOP*
  115.         #FIND#==#03# #ONERROR#=*STOP*
  116.         #FIND#="#04# #ONERROR#=*STOP*
  117.         #TAKEWORD#=#40#,#03#,#04#
  118.     #TAKEMOVIEID#=#40#
  119.     #ENDIF#
  120.  
  121.     #TAKEMOVIEID#=#40#
  122.     #STRING#=#10#=http://www.stopklatka.pl/film/film.asp?fi=#40#&sekcja=osoby&wydarzenie=tak&recenzjadvd=0&wywiady=nie&konkurs=0&dvd=nie&nagrody=nie
  123.     #OPENNEWWEB#=#10#
  124.     #STARTREADWEB#
  125.     #FINDLINE#=size=5 class="text5"><b><i#01##ONERROR#=*OK*
  126.     #IF# #01#<>#02#
  127.             #FIND#=<i#03# #ONERROR#=*OK*
  128.             #FIND#=>#03# #ONERROR#=*OK*
  129.             #FIND#=<#04# #ONERROR#=*OK*
  130.             #TAKEWORD#=#50#,#03#,#04#
  131.         #ENDIF#
  132.     #CHECKVARIABLE#=#50#
  133.     #STARTDELETETAGS#
  134.     #STARTSUBSTITUTETAGS#
  135.     #TITLE#=#50# #ONERROR#=*ASK*
  136.     #PUT#=#03#
  137.     #PUT#=#04#
  138.            #FIND#=<nobr><i>(#03# #ONERROR#=*OK*
  139.            #FIND#=(#03# #ONERROR#=*OK*
  140.            #FIND#=)#04# #ONERROR#=*OK*
  141.            #TAKEWORD#=#24#,#03#,#04#
  142.     #CHECKVARIABLE#=#24#
  143.     #STARTDELETETAGS#
  144.     #STARTSUBSTITUTETAGS#
  145.     #TAKECOMMENTS#=#24#
  146.     #PUT#=#24#
  147.  
  148.  
  149.  
  150.  
  151.  
  152.  
  153. ====================================================================================================== DIRECTOR
  154.         #STARTREADWEB#
  155.         #FINDLINE#=yseria:#03# #ONERROR#=*OK*
  156.     #IF# #03#==#02#
  157.         #GOTO#=NODIRECTOR
  158.     #ENDIF#
  159.     :REPEATDIRECTOR
  160.     #PUT#=/b>,#07#
  161.     #PUT#=/b><#08#
  162.     #FIND#=<b>#03# #ONERROR#=*OK*
  163.     #FIND#=>#03# #ONERROR#=*OK*
  164.     :AGAINDIRECTOR
  165.     #FIND#=</b>#04# #ONERROR#=*OK*
  166.     #COMPUTECURSOR#=+5
  167.     #PUTCURSOR#=#05#
  168.     #TAKEWORD#=#06#,#04#,#05#
  169.     #IF# #06#==#07#
  170.         #GOTO#=AGAINDIRECTOR
  171.     #ENDIF#
  172.     #TAKEWORD#=#49#,#03#,#04#
  173.     #CHECKVARIABLE#=#49#
  174.     #STARTDELETETAGS#
  175.     #STARTSUBSTITUTETAGS#
  176.     #TAKEDIRECTOR#=#49#
  177.     #IF# #06#<>#08#
  178.         #GOTO#=REPEATDIRECTOR
  179.     #ENDIF#
  180.   :NODIRECTOR
  181.     #PUT#=#03#
  182.     #PUT#=#04#
  183.     #PUT#=#07#
  184.     #PUT#=#08#
  185. ======================================================================================== ACTROS
  186.     #STARTREADWEB#
  187.     #PUT#=#01#
  188.     #PUT#=/b><br>#07#
  189.     #PUT#=/b></fo#08#
  190.     #FINDLINE#=obsada:#03# #ONERROR#=*OK*
  191.     #IF# #02#==#03#
  192.         #GOTO#=NOACTORS
  193.     #ENDIF#
  194.   :NEXTACTOR
  195.     #FIND#=<b>#03# #ONERROR#=*OK*
  196.     #FIND#=>#03# #ONERROR#=*OK*
  197.   :AGAINACTORS
  198.     #FIND#=</b>#04# #ONERROR#=*OK*
  199.     #COMPUTECURSOR#=+8
  200.     #PUTCURSOR#=#05#
  201.     #TAKEWORD#=#06#,#04#,#05#
  202.     #IF# #06#==#07#
  203.         #TAKEWORD#=#48#,#03#,#04#
  204.         #CHECKVARIABLE#=#48#
  205.         #STARTDELETETAGS#
  206.         #STARTSUBSTITUTETAGS#
  207.         #STRING#=#01#=#01##48#, 
  208.         #GOTO#=NEXTACTOR
  209.     #ENDIF#
  210.     #IF# #06#==#08#
  211.         #TAKEWORD#=#48#,#03#,#04#
  212.         #CHECKVARIABLE#=#48#
  213.         #STARTDELETETAGS#
  214.         #STARTSUBSTITUTETAGS#
  215.         #STRING#=#01#=#01##48#.
  216.         #GOTO#=LASTACTORS
  217.     #ENDIF#
  218.     #COMPUTECURSOR#=+3
  219.     #PUTCURSOR#=#05#
  220.     #TAKEWORD#=#06#,#04#,#05#
  221.     #PUT#=/b></a></f#09#
  222.     #IF# #06#==#09#
  223.         #TAKEWORD#=#48#,#03#,#04#
  224.         #CHECKVARIABLE#=#48#
  225.         #STARTDELETETAGS#
  226.         #STARTSUBSTITUTETAGS#
  227.         #STRING#=#01#=#01##48#.
  228.         #GOTO#=LASTACTORS
  229.     #ENDIF#
  230.     #PUT#=/b></a><br#09#
  231.     #IF# #06#==#09#
  232.         #TAKEWORD#=#48#,#03#,#04#
  233.         #CHECKVARIABLE#=#48#
  234.         #STARTDELETETAGS#
  235.         #STARTSUBSTITUTETAGS#
  236.         #STRING#=#01#=#01##48#, 
  237.         #GOTO#=NEXTACTOR
  238.     #ENDIF#
  239.     #GOTO#=AGAINACTORS
  240.   :LASTACTORS
  241.     #TAKEACTOR#=#01#
  242.     #PUT#=#01#
  243.     #PUT#=#03#
  244.     #PUT#=#04#
  245.     #PUT#=#05#
  246.     #PUT#=#06#
  247.     #PUT#=#07#
  248.     #PUT#=#08#
  249.     #PUT#=#09#
  250.   :NOACTORS
  251.  
  252. ======================================================================================== ACTROS(VOICE)
  253.     #STARTREADWEB#
  254.     #PUT#=#01#
  255.     #PUT#=/b><br>#07#
  256.     #PUT#=/b></fo#08#
  257.     #FINDLINE#=g│os:#03# #ONERROR#=*OK*
  258.     #IF# #02#==#03#
  259.         #GOTO#=NOACTORSV
  260.     #ENDIF#
  261.     #PUT#=  [GúOSY]:  #01#
  262.   :NEXTACTORV
  263.     #FIND#=<b>#03# #ONERROR#=*OK*
  264.     #FIND#=>#03# #ONERROR#=*OK*
  265.   :AGAINACTORSV
  266.     #FIND#=</b>#04# #ONERROR#=*OK*
  267.     #COMPUTECURSOR#=+8
  268.     #PUTCURSOR#=#05#
  269.     #TAKEWORD#=#06#,#04#,#05#
  270.     #IF# #06#==#07#
  271.         #TAKEWORD#=#48#,#03#,#04#
  272.         #CHECKVARIABLE#=#48#
  273.         #STARTDELETETAGS#
  274.         #STARTSUBSTITUTETAGS#
  275.         #STRING#=#01#=#01##48#, 
  276.         #GOTO#=NEXTACTORV
  277.     #ENDIF#
  278.     #IF# #06#==#08#
  279.         #TAKEWORD#=#48#,#03#,#04#
  280.         #CHECKVARIABLE#=#48#
  281.         #STARTDELETETAGS#
  282.         #STARTSUBSTITUTETAGS#
  283.         #STRING#=#01#=#01##48#.
  284.         #GOTO#=LASTACTORSV
  285.     #ENDIF#
  286.     #COMPUTECURSOR#=+3
  287.     #PUTCURSOR#=#05#
  288.     #TAKEWORD#=#06#,#04#,#05#
  289.     #PUT#=/b></a></f#09#
  290.     #IF# #06#==#09#
  291.         #TAKEWORD#=#48#,#03#,#04#
  292.         #CHECKVARIABLE#=#48#
  293.         #STARTDELETETAGS#
  294.         #STARTSUBSTITUTETAGS#
  295.         #STRING#=#01#=#01##48#.
  296.         #GOTO#=LASTACTORSV
  297.     #ENDIF#
  298.     #PUT#=/b></a><br#09#
  299.     #IF# #06#==#09#
  300.         #TAKEWORD#=#48#,#03#,#04#
  301.         #CHECKVARIABLE#=#48#
  302.         #STARTDELETETAGS#
  303.         #STARTSUBSTITUTETAGS#
  304.         #STRING#=#01#=#01##48#, 
  305.         #GOTO#=NEXTACTORV
  306.     #ENDIF#
  307.     #PUT#=/b></a>&nb#09#
  308.     #IF# #06#==#09#
  309.         #TAKEWORD#=#48#,#03#,#04#
  310.         #CHECKVARIABLE#=#48#
  311.         #STARTDELETETAGS#
  312.         #STARTSUBSTITUTETAGS#
  313.         #STRING#=#01#=#01##48#/
  314.         #GOTO#=NEXTACTORV
  315.     #ENDIF#
  316.     #PUT#=/b> /#09#
  317.     #IF# #06#==#09#
  318.         #TAKEWORD#=#48#,#03#,#04#
  319.         #CHECKVARIABLE#=#48#
  320.         #STARTDELETETAGS#
  321.         #STARTSUBSTITUTETAGS#
  322.         #STRING#=#01#=#01##48#/
  323.         #GOTO#=NEXTACTORV
  324.     #ENDIF#
  325.  
  326.     #GOTO#=AGAINACTORSV
  327.  
  328.   :LASTACTORSV
  329.     #TAKEACTOR#=#01#
  330.   :NOACTORSV
  331.     #PUT#=#01#
  332.     #PUT#=#03#
  333.     #PUT#=#04#
  334.     #PUT#=#05#
  335.     #PUT#=#06#
  336.     #PUT#=#07#
  337.     #PUT#=#08#
  338.     #PUT#=#09#
  339. ======================================================================================== ENDACTROS(VOICE)
  340.  
  341.  
  342.  
  343. ===============================================================================================  WRITER
  344.  
  345.     #PUT#=#09#
  346.     #PUT#=#36#
  347.         #STARTREADWEB#
  348.         #FINDLINE#=scenariusz:#03# #ONERROR#=*OK*
  349.     #IF# #03#==#02#
  350.         #GOTO#=NOWRITER
  351.     #ENDIF#
  352.     #PUT#=/b>,#07#
  353.     #PUT#=/b></a>,#08#
  354.     :AGAINWRITER
  355.     #FIND#=<b>#03# #ONERROR#=*OK*
  356.     #FIND#=>#03# #ONERROR#=*OK*
  357.     #FIND#=</b>#04# #ONERROR#=*OK*
  358.     #TAKEWORD#=#09#,#03#,#04#
  359.     #CHECKVARIABLE#=#09#
  360.     #STARTDELETETAGS#
  361.     #STARTSUBSTITUTETAGS#
  362.     #STRING#=#36#=#36##09#
  363.     #PUTCURSOR#=#03#
  364.     #COMPUTECURSOR#=+5
  365.     #PUTCURSOR#=#04#
  366.     #TAKEWORD#=#06#,#03#,#04#
  367.     #IF# #06#==#07#
  368.         #STRING#=#36#=#36#, 
  369.         #GOTO#=AGAINWRITER
  370.     #ENDIF#
  371.     #COMPUTECURSOR#=+4
  372.     #PUTCURSOR#=#04#
  373.     #TAKEWORD#=#06#,#03#,#04#
  374.     #IF# #06#==#08#
  375.         #STRING#=#36#=#36#, 
  376.         #GOTO#=AGAINWRITER
  377.     #ENDIF#
  378.   :NOWRITER
  379.     #TAKEWRITER#=#36#
  380.     #PUT#=#01#
  381.     #PUT#=#03#
  382.     #PUT#=#04#
  383.     #PUT#=#05#
  384.     #PUT#=#06#
  385.     #PUT#=#07#
  386.     #PUT#=#08#
  387.     #PUT#=#09#
  388.  
  389. ========================================================================================  MUSIC
  390.  
  391.         #STARTREADWEB#
  392.         #FINDLINE#=muzyka:#03# #ONERROR#=*OK*
  393.     #IF# #03#==#02#
  394.         #GOTO#=NOMUSIC
  395.     #ENDIF#
  396.     :REPEATMUSIC
  397.     #PUT#=/b>,#07#
  398.     #PUT#=/b><#08#
  399.     #FIND#=<b>#03# #ONERROR#=*OK*
  400.     #FIND#=>#03# #ONERROR#=*OK*
  401.     :AGAINMUSIC
  402.     #FIND#=</b>#04# #ONERROR#=*OK*
  403.     #COMPUTECURSOR#=+5
  404.     #PUTCURSOR#=#05#
  405.     #TAKEWORD#=#06#,#04#,#05#
  406.     #IF# #06#==#07#
  407.         #GOTO#=AGAINMUSIC
  408.     #ENDIF#
  409.     #TAKEWORD#=#35#,#03#,#04#
  410.     #CHECKVARIABLE#=#35#
  411.     #STARTDELETETAGS#
  412.     #STARTSUBSTITUTETAGS#
  413.     #TAKEMUSIC#=#35#
  414.     #IF# #06#<>#08#
  415.         #GOTO#=REPEATMUSIC
  416.     #ENDIF#
  417.   :NOMUSIC
  418.     #PUT#=#01#
  419.     #PUT#=#03#
  420.     #PUT#=#04#
  421.     #PUT#=#05#
  422.     #PUT#=#06#
  423.     #PUT#=#07#
  424.     #PUT#=#08#
  425.     #PUT#=#09#
  426.  
  427. ========================================================================================  ENDMUSIC
  428.  
  429. ========================================================================================  PHOTOGRAPHER
  430.  
  431.         #STARTREADWEB#
  432.         #FINDLINE#=zdjΩcia:#03# #ONERROR#=*OK*
  433.     #IF# #03#==#02#
  434.         #GOTO#=NOPHOTOGRAPHER
  435.     #ENDIF#
  436.     :REPEATPHOTOGRAPHER
  437.     #PUT#=/b>,#07#
  438.     #PUT#=/b><#08#
  439.     #FIND#=<b>#03# #ONERROR#=*OK*
  440.     #FIND#=>#03# #ONERROR#=*OK*
  441.     :AGAINPHOTOGRAPHER
  442.     #FIND#=</b>#04# #ONERROR#=*OK*
  443.     #COMPUTECURSOR#=+5
  444.     #PUTCURSOR#=#05#
  445.     #TAKEWORD#=#06#,#04#,#05#
  446.     #IF# #06#==#07#
  447.         #GOTO#=AGAINPHOTOGRAPHER
  448.     #ENDIF#
  449.     #TAKEWORD#=#29#,#03#,#04#
  450.     #CHECKVARIABLE#=#29#
  451.     #STARTDELETETAGS#
  452.     #STARTSUBSTITUTETAGS#
  453.     #TAKEPHOTOGRAPHER#=#29#
  454.     #IF# #06#<>#08#
  455.         #GOTO#=REPEATPHOTOGRAPHER
  456.     #ENDIF#
  457.   :NOPHOTOGRAPHER
  458.     #PUT#=#01#
  459.     #PUT#=#03#
  460.     #PUT#=#04#
  461.     #PUT#=#05#
  462.     #PUT#=#06#
  463.     #PUT#=#07#
  464.     #PUT#=#08#
  465.     #PUT#=#09#
  466.  
  467. ========================================================================================  ENDPHOTOGRAPHER
  468.  
  469. ======================================================================================== PRODUCER
  470.         #STARTREADWEB#
  471.     #PUT#=#37#
  472.     #PUT#=#09#
  473.         #FINDLINE#=producent:#03# #ONERROR#=*OK*
  474.     #IF# #03#==#02#
  475.         #GOTO#=NOPRODUCER
  476.     #ENDIF#
  477.     #PUT#=/b>,#07#
  478.     #PUT#=/b></a>,#08#
  479.     :AGAINPRODUCER
  480.     #FIND#=<b>#03# #ONERROR#=*OK*
  481.     #FIND#=>#03# #ONERROR#=*OK*
  482.     #FIND#=</b>#04# #ONERROR#=*OK*
  483.     #TAKEWORD#=#09#,#03#,#04#
  484.     #CHECKVARIABLE#=#09#
  485.     #STARTDELETETAGS#
  486.     #STARTSUBSTITUTETAGS#
  487.     #STRING#=#37#=#37##09#
  488.     #PUTCURSOR#=#03#
  489.     #COMPUTECURSOR#=+5
  490.     #PUTCURSOR#=#04#
  491.     #TAKEWORD#=#06#,#03#,#04#
  492.     #IF# #06#==#07#
  493.         #STRING#=#37#=#37#, 
  494.         #GOTO#=AGAINPRODUCER
  495.     #ENDIF#
  496.     #COMPUTECURSOR#=+4
  497.     #PUTCURSOR#=#04#
  498.     #TAKEWORD#=#06#,#03#,#04#
  499.     #IF# #06#==#08#
  500.         #STRING#=#37#=#37#, 
  501.         #GOTO#=AGAINPRODUCER
  502.     #ENDIF#
  503.   :NOPRODUCER
  504.     
  505.     #RESTOREWEB#
  506.     #PUT#=#01#
  507.     #PUT#=#03#
  508.     #PUT#=#04#
  509.     #PUT#=#05#
  510.     #PUT#=#06#
  511.     #PUT#=#07#
  512.     #PUT#=#08#
  513.     #PUT#=#09#
  514. ======================================================================================== ENDPRODUCER
  515.  
  516.  
  517.  
  518.  
  519. ======================================================================================== PLOT
  520.     #PUT#=1#05#
  521.     #STRING#=#10#=http://www.stopklatka.pl/film/film.asp?fi=#40#&sekcja=1&wydarzenie=tak&recenzjadvd=0&wywiady=nie&konkurs=0&dvd=nie&nagrody=nie
  522.     #OPENNEWWEB#=#10#
  523.     #STARTREADWEB#
  524.     #FINDLINE#=size=4 class="text4">#03# #ONERROR#=*OK*
  525.     #IF# #03#==#02#
  526.         #GOTO#=NOPLOT
  527.     #ENDIF#
  528.     #FIND#=</font>#03# #ONERROR#=*OK*
  529.     #FIND#=>#03# #ONERROR#=*OK*
  530.     #FIND#=</font>#03# #ONERROR#=*OK*
  531.     #FIND#=>#03# #ONERROR#=*OK*
  532.     #IF# #03#==#02#
  533.         #GOTO#=NOPLOT
  534.     #ENDIF#
  535.   :AGAINPLOT
  536.     #FIND#=</p>#04# #ONERROR#=*OK*
  537.     #IF# #04#==#05#
  538.         #GOTO#=NOPLOT
  539.     #ENDIF#
  540.     #TAKEWORD#=#44#,#03#,#04#
  541.     #CHECKVARIABLE#=#44#
  542.     #STARTDELETETAGS#
  543.     #STARTSUBSTITUTETAGS#
  544.     #TAKEPLOT#=#44#
  545.     #IF# #04#==#02#
  546.         #READNEXTLINE#
  547.         #PUT#=0#03#
  548.         #GOTO#=AGAINPLOT
  549.     #ENDIF#
  550.   :NOPLOT
  551.     #RESTOREWEB#
  552.     #PUT#=#01#
  553.     #PUT#=#03#
  554.     #PUT#=#04#
  555.     #PUT#=#05#
  556.     #PUT#=#06#
  557.     #PUT#=#07#
  558.     #PUT#=#08#
  559.     #PUT#=#09#
  560. ======================================================================================== ENDPLOT
  561.  
  562. ****************************************************************************************************
  563.     #STRING#=#10#=http://www.stopklatka.pl/film/film.asp?fi=#40#
  564.     #OPENNEWWEB#=#10#
  565. ****************************************************************************************************
  566.  
  567. ======================================================================================== TAGLINE
  568.     #STARTREADWEB#
  569.     #FINDLINE#=        <table#03# #ONERROR#=*OK*
  570.     #IF# #03#==#02#
  571.         #GOTO#=NOTAG
  572.     #ENDIF#
  573.     #FIND#=</font></td><td width='95%'><font color=#03# #ONERROR#=*OK*
  574.     #FIND#=size=2 face='arial, arial ce'>#03# #ONERROR#=*OK*
  575.     #FIND#=>#03# #ONERROR#=*OK*
  576.     #FIND#=<#04# #ONERROR#=*OK*
  577.     #TAKEWORD#=#30#,#03#,#04#
  578.     #CHECKVARIABLE#=#30#
  579.     #STARTDELETETAGS#
  580.     #STARTSUBSTITUTETAGS#
  581.     #TAKETAGLINE#=#30#
  582.   :NOTAG
  583.     #PUT#=#03#
  584.     #PUT#=#04#
  585. ======================================================================================== ENDTAGLINE
  586.  
  587.  
  588.  
  589.  
  590. ======================================================================================== RATING
  591.     TAKERATING=46
  592. ======================================================================================== ENDRATING
  593.  
  594. ======================================================================================== COMMENTS
  595.     TAKECOMMENTS=45
  596. ======================================================================================== ENDCOMMENTS
  597.  
  598. ======================================================================================== RUNTIME
  599.     #STARTREADWEB#
  600.     #FINDLINE#=trwania:</font></td>#03# #ONERROR#=*OK*
  601.     #IF# #02#==#03#
  602.         #GOTO#=NORUNTIME
  603.     #ENDIF#
  604.     #FIND#=<b>#03# #ONERROR#=*OK*
  605.     #FIND#=>#03# #ONERROR#=*OK*
  606.     #FIND#=<#04# #ONERROR#=*OK*
  607.     #TAKEWORD#=#43#,#03#,#04#
  608.     #CHECKVARIABLE#=#43#
  609.     #STARTDELETETAGS#
  610.     #STARTSUBSTITUTETAGS#
  611.     #TAKERUNTIME#=#43#
  612.   :NORUNTIME
  613.     #PUT#=#03#
  614.     #PUT#=#04#
  615. ======================================================================================== ENDRUNTIME
  616.  
  617.  
  618.  
  619.  
  620. ======================================================================================== YEAR
  621.     #STARTREADWEB#
  622.     #FINDLINE#=rok produkcji:</font></td>#03# #ONERROR#=*OK*
  623.     #IF# #02#==#03#
  624.         #GOTO#=NOYEAR
  625.     #ENDIF#
  626.     #FIND#=<b>#03# #ONERROR#=*OK*
  627.     #FIND#=>#03# #ONERROR#=*OK*
  628.     #FIND#=<#04# #ONERROR#=*OK*
  629.     #TAKEWORD#=#42#,#03#,#04#
  630.     #CHECKVARIABLE#=#42#
  631.     #STARTDELETETAGS#
  632.     #STARTSUBSTITUTETAGS#
  633.     #TAKEYEAR#=#42#
  634.   :NOYEAR
  635.     #PUT#=#03#
  636.     #PUT#=#04#
  637. ======================================================================================== ENDYEAR
  638.  
  639.  
  640.  
  641.  
  642. ======================================================================================== COUNTRY
  643.     #STARTREADWEB#
  644.     #FINDLINE#=kraj:</font></td>#03# #ONERROR#=*OK*
  645.     #IF# #02#==#03#
  646.         #GOTO#=NOCOUNTRY
  647.     #ENDIF#
  648.     #FIND#=<b>#03# #ONERROR#=*OK*
  649.     #FIND#=>#03# #ONERROR#=*OK*
  650.     #FIND#=<#04# #ONERROR#=*OK*
  651.     #TAKEWORD#=#41#,#03#,#04#
  652.     #CHECKVARIABLE#=#41#
  653.     #STARTDELETETAGS#
  654.     #STARTSUBSTITUTETAGS#
  655.     #TAKECOUNTRY#=#41#
  656.   :NOCOUNTRY
  657.     #PUT#=#03#
  658.     #PUT#=#04#
  659. ======================================================================================== ENDCOUNTRY
  660.  
  661.  
  662.  
  663.  
  664. ======================================================================================== LANGUAGE
  665.     TAKELANGUAGE=39
  666. ======================================================================================== ENDLANGUAGE
  667.  
  668.  
  669.  
  670.  
  671. ======================================================================================== REGION
  672.     TAKEREGION=34
  673. ======================================================================================== ENDREGION
  674.  
  675.  
  676.  
  677.  
  678. ======================================================================================== EDITION
  679.     TAKEEDITION=33
  680. ======================================================================================== ENDEDITION
  681.  
  682.  
  683.  
  684.  
  685. ======================================================================================== SCREENDVD
  686.     TAKESCREENDVD=32
  687. ======================================================================================== ENDSCREENDVD
  688.  
  689.  
  690.  
  691.  
  692. ======================================================================================== AUDIODVD
  693.     TAKEAUDIODVD=31
  694. ======================================================================================== ENDAUDIODVD
  695.  
  696.  
  697.  
  698.  
  699. ======================================================================================== STUDIO
  700.     TAKESTUDIO=28
  701. ======================================================================================== ENDSTUDIO
  702.  
  703.  
  704.  
  705.  
  706. ======================================================================================== MPAA
  707.     TAKEMPAA=27
  708. ======================================================================================== ENDMPAA
  709.  
  710.  
  711.  
  712.  
  713. ======================================================================================== DISTRIBUTOR
  714.     TAKEDISTRIBUTOR=26
  715. ======================================================================================== ENDDISTRIBUTOR
  716.  
  717.  
  718.  
  719.  
  720. ======================================================================================== OFFICIALWEB
  721.     #STARTREADWEB#
  722.     #FINDLINE#=oficjalna:</font></td>#03# #ONERROR#=*OK*
  723.     #IF# #02#==#03#
  724.         #GOTO#=NOOFFICIALWEB
  725.     #ENDIF#
  726.     #FIND#=a href=#03# #ONERROR#=*OK*
  727.     #FIND#=>#03# #ONERROR#=*OK*
  728.     #FIND#=<#04# #ONERROR#=*OK*
  729.     #TAKEWORD#=#25#,#03#,#04#
  730.     #CHECKVARIABLE#=#25#
  731.     #STARTDELETETAGS#
  732.     #STARTSUBSTITUTETAGS#
  733.     #TAKEOFFICIALWEB#=#25#
  734.   :NOOFFICIALWEB
  735.     #PUT#=#03#
  736.     #PUT#=#04#
  737. ======================================================================================== ENDOFFICIALWEB
  738.     #RESTOREWEB#
  739. #ENDMOVIETITLE#
  740.  
  741. =====================================================================================================================
  742.  
  743. #GENRE#
  744.     #PUT#=#47#
  745.       #PUT#=0#02#
  746.  
  747.     #STRING#=#10#=http://www.stopklatka.pl/film/film.asp?fi=#40#
  748.     #OPENNEWWEB#=#10#
  749.     #STARTREADWEB#
  750.     #FINDLINE#=gatunek:</font></td>#03# #ONERROR#=*OK*
  751.     #IF# #02#==#03#
  752.         #GOTO#=NOGENRE
  753.     #ENDIF#
  754.     #FIND#=<b>#03# #ONERROR#=*OK*
  755.     #FIND#=>#03# #ONERROR#=*OK*
  756.     #FIND#=<#04# #ONERROR#=*OK*
  757.     #TAKEWORD#=#08#,#03#,#04#
  758.     #STRING#=#47#=#08#
  759.     #CHECKVARIABLE#=#47#
  760.     #STARTDELETETAGS#
  761.     #STARTSUBSTITUTETAGS#
  762.  
  763.   :NOGENRE
  764.     #TAKEGENRE#=#47#
  765.     #PUT#=#03#
  766.     #PUT#=#04#
  767.     #PUT#=#08#
  768.     #RESTOREWEB#
  769. #ENDGENRE#
  770.  
  771.  
  772.  
  773.  
  774.  
  775.  
  776.  
  777.  
  778.  
  779.  
  780.  
  781.  
  782.  
  783.  
  784. *********************************************************************************************************************
  785. =====================================================================================================================
  786. #DELETETAGS#
  787.     #DELETEWORD#= 
  788.     #DELETEWORD#=&NBSP;
  789.     #DELETEWORD#=<br>
  790.     #DELETEWORD#=<BR>
  791.     #DELETEWORD#=</br>
  792.     #DELETEWORD#=</BR>
  793.     #DELETEWORD#=<p>
  794.     #DELETEWORD#=<P>
  795.     #DELETEWORD#=</p>
  796.     #DELETEWORD#=</P>
  797.     #DELETEWORD#=</blockquote>
  798.     #DELETEWORD#=</BLOCKQUOTE>
  799.     #DELETEWORD#=<b>
  800.     #DELETEWORD#=<B>
  801.     #DELETEWORD#=</b>
  802.     #DELETEWORD#=</B>
  803.     #DELETEWORD#=B>
  804.     #DELETEWORD#=<i>
  805.     #DELETEWORD#=<I>
  806.     #DELETEWORD#=</i>
  807.     #DELETEWORD#=</I>
  808.     #DELETEWORD#=<a>
  809.     #DELETEWORD#=<A>
  810.     #DELETEWORD#=</a>
  811.     #DELETEWORD#=</A>
  812.     #DELETEWORD#=<font>
  813.     #DELETEWORD#=<FONT>
  814.     #DELETEWORD#=</font>
  815.     #DELETEWORD#=</FONT>
  816.     #DELETEWORD#=</div>
  817.     #DELETEWORD#=</DIV>
  818.     #DELETEWORD#=<p align=justify>
  819.     #DELETEWORD#=<P ALIGN=JUSTIFY>
  820.     #DELETEWORD#=b>
  821.     #DELETEWORD#=  
  822.     #DELETEWORD#=<font size=5 class="text5"> 
  823. #ENDDELETETAGS#
  824.  
  825.  
  826.  
  827.  
  828.  
  829.  
  830.  
  831.  
  832.  
  833.  
  834.  
  835.  
  836.  
  837.  
  838.  
  839.  
  840.  
  841.  
  842.  
  843.  
  844.  
  845.  
  846.  
  847.  
  848.  
  849. #SUBSTITUTETAGS#
  850.     #SUBSTITUTEWORD#='='
  851.     #SUBSTITUTEWORD#= = 
  852.     #SUBSTITUTEWORD#=¡=í
  853.     #SUBSTITUTEWORD#=¢=ó
  854.     #SUBSTITUTEWORD#=£=ú
  855.     #SUBSTITUTEWORD#=¤=ñ
  856.     #SUBSTITUTEWORD#=¥=Ñ
  857.     #SUBSTITUTEWORD#=¦=ª
  858.     #SUBSTITUTEWORD#=§=º
  859.     #SUBSTITUTEWORD#=¨=¿
  860.     #SUBSTITUTEWORD#=©=⌐
  861.     #SUBSTITUTEWORD#=ª=¬
  862.     #SUBSTITUTEWORD#=«=½
  863.     #SUBSTITUTEWORD#=¬=¼
  864.     #SUBSTITUTEWORD#=­=¡
  865.     #SUBSTITUTEWORD#=®=«
  866.     #SUBSTITUTEWORD#=¯=»
  867.     #SUBSTITUTEWORD#=°=░
  868.     #SUBSTITUTEWORD#=±=▒
  869.     #SUBSTITUTEWORD#=²=▓
  870.     #SUBSTITUTEWORD#=³=│
  871.     #SUBSTITUTEWORD#=´=┤
  872.     #SUBSTITUTEWORD#=µ=╡
  873.     #SUBSTITUTEWORD#=¶=╢
  874.     #SUBSTITUTEWORD#=·=╖
  875.     #SUBSTITUTEWORD#=¸=╕
  876.     #SUBSTITUTEWORD#=¹=╣
  877.     #SUBSTITUTEWORD#=º=║
  878.     #SUBSTITUTEWORD#=»=╗
  879.     #SUBSTITUTEWORD#=¼=╝
  880.     #SUBSTITUTEWORD#=½=╜
  881.     #SUBSTITUTEWORD#=¾=╛
  882.     #SUBSTITUTEWORD#=¿=┐
  883.     #SUBSTITUTEWORD#=À=└
  884.     #SUBSTITUTEWORD#=Á=┴
  885.     #SUBSTITUTEWORD#=Â=┬
  886.     #SUBSTITUTEWORD#=Ã=├
  887.     #SUBSTITUTEWORD#=Ä=─
  888.     #SUBSTITUTEWORD#=Å=┼
  889.     #SUBSTITUTEWORD#=Æ=╞
  890.     #SUBSTITUTEWORD#=Ç=╟
  891.     #SUBSTITUTEWORD#=È=╚
  892.     #SUBSTITUTEWORD#=É=╔
  893.     #SUBSTITUTEWORD#=Ê=╩
  894.     #SUBSTITUTEWORD#=Ë=╦
  895.     #SUBSTITUTEWORD#=Ì=╠
  896.     #SUBSTITUTEWORD#=Í=═
  897.     #SUBSTITUTEWORD#=Î=╬
  898.     #SUBSTITUTEWORD#=Ï=╧
  899.     #SUBSTITUTEWORD#=Ð=╨
  900.     #SUBSTITUTEWORD#=Ñ=╤
  901.     #SUBSTITUTEWORD#=Ò=╥
  902.     #SUBSTITUTEWORD#=Ó=╙
  903.     #SUBSTITUTEWORD#=Ô=╘
  904.     #SUBSTITUTEWORD#=Õ=╒
  905.     #SUBSTITUTEWORD#=Ö=╓
  906.     #SUBSTITUTEWORD#=×=╫
  907.     #SUBSTITUTEWORD#=Ø=╪
  908.     #SUBSTITUTEWORD#=Ù=┘
  909.     #SUBSTITUTEWORD#=Ú=┌
  910.     #SUBSTITUTEWORD#=Û=█
  911.     #SUBSTITUTEWORD#=Ü=▄
  912.     #SUBSTITUTEWORD#=Ý=▌
  913.     #SUBSTITUTEWORD#=Þ=▐
  914.     #SUBSTITUTEWORD#=ß=▀
  915.     #SUBSTITUTEWORD#=à=α
  916.     #SUBSTITUTEWORD#=á=ß
  917.     #SUBSTITUTEWORD#=â=Γ
  918.     #SUBSTITUTEWORD#=ã=π
  919.     #SUBSTITUTEWORD#=ä=Σ
  920.     #SUBSTITUTEWORD#=å=σ
  921.     #SUBSTITUTEWORD#=æ=µ
  922.     #SUBSTITUTEWORD#=ç=τ
  923.     #SUBSTITUTEWORD#=è=Φ
  924.     #SUBSTITUTEWORD#=é=Θ
  925.     #SUBSTITUTEWORD#=ê=Ω
  926.     #SUBSTITUTEWORD#=ë=δ
  927.     #SUBSTITUTEWORD#=ì=∞
  928.     #SUBSTITUTEWORD#=í=φ
  929.     #SUBSTITUTEWORD#=î=ε
  930.     #SUBSTITUTEWORD#=ï=∩
  931.     #SUBSTITUTEWORD#=ð=≡
  932.     #SUBSTITUTEWORD#=ñ=±
  933.     #SUBSTITUTEWORD#=ò=≥
  934.     #SUBSTITUTEWORD#=ó=≤
  935.     #SUBSTITUTEWORD#=ô=⌠
  936.     #SUBSTITUTEWORD#=õ=⌡
  937.     #SUBSTITUTEWORD#=ö=÷
  938.     #SUBSTITUTEWORD#=÷=≈
  939.     #SUBSTITUTEWORD#=ø=°
  940.     #SUBSTITUTEWORD#=ù=∙
  941.     #SUBSTITUTEWORD#=ú=·
  942.     #SUBSTITUTEWORD#=û=√
  943.     #SUBSTITUTEWORD#=ü=ⁿ
  944.     #SUBSTITUTEWORD#=ý=²
  945.     #SUBSTITUTEWORD#=þ=■
  946.     #SUBSTITUTEWORD#=ÿ= 
  947. #ENDSUBSTITUTETAGS#
  948.  
  949.  
  950.  
  951.  
  952.  
  953.  
  954.  
  955.  
  956.  
  957.  
  958.  
  959.  
  960.  
  961.  
  962.